home *** CD-ROM | disk | FTP | other *** search
/ Scene Storm / Scene Storm - Volume 1.iso / coding / c / amiexpress / source / doors / amixpr / amicon.c next >
Encoding:
C/C++ Source or Header  |  1992-12-26  |  7.9 KB  |  326 lines
  1. #include <exec/types.h>
  2. #include <exec/exec.h>
  3. #include <exec/memory.h>
  4. #include <exec/ports.h>
  5. #include <libraries/dos.h>
  6. #include <devices/timer.h>
  7. #include <intuition/intuitionbase.h>
  8. #include <stdio.h>
  9. #include <stdlib.h>
  10. #include "work:romconf/doorheader.h"
  11. #include <functions.h>
  12. #define FOREVER for(;;)
  13. #define SM sendmessage
  14. #define HK hotkey
  15. #define PM prompt
  16. #define DROP Drop()
  17. extern void hotkey();
  18. extern void prompt();
  19. extern void showfile();
  20. extern void end();
  21. extern void getuserstring();
  22. extern void getuserdata();
  23. extern void showgfile();
  24. extern void sendmessage();
  25. extern void sendMessage();
  26. extern void Drop();
  27. extern void putuserstring();
  28. extern int LocalLog;
  29. VOID Register(int node);
  30. VOID ShutDown(VOID);
  31. VOID CloseOut();
  32. void getcmduserstring(char *ostring,int nl);
  33. struct MsgPort *CreatePrt(UBYTE *name,LONG pri);
  34. void getmaxuserstring(char *ostring,int nl);
  35. BOOL PutToPort(struct Message *);
  36. int Editfile(char Name[],int len);
  37. void ConOnly(char mstring[],int nl);
  38. struct MsgPort *port;
  39. struct MsgPort *replymp;
  40. struct JHMessage *Jhmsg,*msg;
  41. #define ANYKEY "press <RETURN> to continue"
  42.  
  43.  
  44. VOID Register(int node)
  45. {
  46.   ULONG portsig,signal;
  47.   LONG l;
  48.   BOOL foundport, ABORT= FALSE;
  49.   char PortName[80];
  50.   Jhmsg=(struct JHMessage *)AllocMem(sizeof(struct JHMessage),MEMF_PUBLIC);
  51.   
  52.  if(Jhmsg==0)
  53.   {
  54.      printf("Not enough Memory for message structure\n");
  55.      exit(30);
  56.   }
  57.   switch(node)
  58.   {
  59.     case 0: replymp=CreatePrt("DoorReplyPort0",0L);strcpy(PortName,"DoorReplyPort0"); break;
  60.     case 1: replymp=CreatePrt("DoorReplyPort1",0L);strcpy(PortName,"DoorReplyPort1"); break;
  61.     case 2: replymp=CreatePrt("DoorReplyPort2",0L);strcpy(PortName,"DoorReplyPort2"); break;
  62.     case 3: replymp=CreatePrt("DoorReplyPort3",0L);strcpy(PortName,"DoorReplyPort3"); break;
  63.     case 4: replymp=CreatePrt("DoorReplyPort4",0L);strcpy(PortName,"DoorReplyPort4"); break;
  64.     case 5: replymp=CreatePrt("DoorReplyPort5",0L);strcpy(PortName,"DoorReplyPort5"); break;
  65.     case 6: replymp=CreatePrt("DoorReplyPort6",0L);strcpy(PortName,"DoorReplyPort6"); break;
  66.     case 7: replymp=CreatePrt("DoorReplyPort7",0L);strcpy(PortName,"DoorReplyPort7"); break;
  67.     case 8: replymp=CreatePrt("DoorReplyPort8",0L);strcpy(PortName,"DoorReplyPort8"); break;
  68.     case 9: replymp=CreatePrt("DoorReplyPort9",0L);strcpy(PortName,"DoorReplyPort9"); break;
  69.   }
  70.   if(replymp==0)
  71.   {
  72.     printf("Couldn't create reply port\n");
  73.     FreeMem(Jhmsg,sizeof(struct JHMessage));
  74.     exit(30);
  75.   }
  76.   Jhmsg->Msg.mn_Node.ln_Type=NT_MESSAGE;
  77.   Jhmsg->Msg.mn_Length=sizeof(struct JHMessage);
  78.   Jhmsg->Msg.mn_ReplyPort=replymp;
  79.   strcpy(Jhmsg->String,PortName);
  80.   Jhmsg->Command=JH_REGISTER;
  81.   Jhmsg->Data=2;
  82.   Jhmsg->NodeID=-1;
  83.   Jhmsg->LineNum=0;
  84.   sprintf(PortName,"AEDoorPort%d",node);
  85.   while(!(port=FindPort(PortName)));
  86.   PutToPort((struct Message *)Jhmsg);
  87.  
  88.     portsig=1<<replymp->mp_SigBit;
  89.   
  90. Wait(portsig);
  91. msg=(struct JHMessage *)GetMsg((struct MsgPort *)replymp);
  92.  
  93. }
  94.  
  95. VOID ShutDown(VOID)
  96. {
  97.  ULONG portsig,usersig,signal;
  98.   BOOL foundport, ABORT= FALSE;
  99.  
  100.  portsig=1<<replymp->mp_SigBit;
  101.   Jhmsg->Command=JH_SHUTDOWN;
  102.   PutToPort((struct Message *)Jhmsg); 
  103.   signal=Wait(portsig);
  104.       while(msg=(struct JHMessage *)GetMsg((struct MsgPort *)replymp));
  105.        DeletePort((struct MsgPort *)replymp);
  106.        FreeMem(Jhmsg,sizeof(struct JHMessage));
  107. }
  108.  
  109. int Editfile(char Name[],int len)
  110. { 
  111.          strcpy(msg->String,Name);
  112.          msg->Command=JH_EF;
  113.          msg->Data=len;
  114.          PutToPort((struct Message *)Jhmsg); 
  115.          WaitPort(replymp);
  116.          GetMsg(replymp);
  117.          len=msg->Data;
  118.          if(msg->Data==-1) CloseOut();
  119.          return(len);
  120. }
  121.  
  122. BOOL PutToPort(struct Message *message)
  123. {
  124.   PutMsg(port,message);
  125.   return((BOOL)1);
  126. }
  127. /*void end()
  128. {
  129.  exit(0);
  130. }
  131. */
  132. void sendmessage(mstring,nl)
  133. char mstring[];
  134. int nl;
  135. {
  136.         register int counter;
  137.         char Temp[80];
  138.    
  139.         if(strlen(mstring)<80) sendMessage(mstring,0);
  140.         else
  141.         {
  142.           counter=0;
  143.           do
  144.           {
  145.             sprintf(Temp,"%.79s",&mstring[counter]);
  146.             sendMessage(Temp,0);
  147.             counter +=79;
  148.           }while(strlen(Temp)==79);
  149.         }
  150.         if(nl==1){ sendMessage("",1); Jhmsg->LineNum +=1; }
  151.         if(Jhmsg->LineNum==22)
  152.         { hotkey(ANYKEY,Temp); DROP;
  153.  SM("\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b",0);
  154. SM("                          ",0);
  155. SM("\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b",0);
  156. }
  157. }
  158. void ConOnly(char mstring[],int nl)
  159. {
  160.   Jhmsg->Data = nl;
  161.   Jhmsg->Command = JH_CO;
  162.   strcpy(Jhmsg->String,mstring);
  163.   PutToPort((struct Message *)Jhmsg);
  164.   (void)WaitPort(replymp);
  165.   (void)GetMsg(replymp);
  166. }
  167. void sendMessage(mstring,nl)
  168. char mstring[];
  169. int nl;
  170. {
  171.     Jhmsg->Data = nl;
  172.     Jhmsg->Command = JH_SM;
  173.     strcpy(Jhmsg->String,mstring);
  174.     PutToPort((struct Message *)Jhmsg);
  175.     (void)WaitPort(replymp);
  176.     (void)GetMsg(replymp);
  177. }
  178. void hotkey(mstring,ostring)
  179. char mstring[];
  180. char *ostring;
  181. {
  182.         Jhmsg->LineNum=0;
  183.     strcpy(Jhmsg->String,mstring);
  184.     Jhmsg->Command = JH_HK;
  185.     PutToPort((struct Message *)Jhmsg);
  186.     (void)WaitPort(replymp);
  187.     (void)GetMsg(replymp);
  188.     strcpy(ostring,Jhmsg->String);
  189. if(Jhmsg->Data==-1) CloseOut();
  190. }
  191.  
  192. void prompt(mstring,ostring,len)
  193. char mstring[];
  194. char *ostring;
  195. int len;
  196. {
  197.         len +=1;
  198.         Jhmsg->LineNum=0;
  199.     strcpy(Jhmsg->String,mstring);
  200.     Jhmsg->Data=len;
  201.     Jhmsg->Command = JH_PM;
  202.     PutToPort((struct Message *)Jhmsg);
  203.     (void)WaitPort(replymp);
  204.     (void)GetMsg(replymp);
  205.     strcpy(ostring,Jhmsg->String);
  206. if(Jhmsg->Data==-1) CloseOut();
  207. }
  208. void showfile(mstring)
  209. char mstring[];
  210. {
  211.     strcpy(Jhmsg->String,mstring);
  212.     Jhmsg->Command = JH_SF;
  213.     PutToPort((struct Message *)Jhmsg);
  214.     (void)WaitPort(replymp);
  215.     (void)GetMsg(replymp);
  216. }
  217. void showgfile(mstring)
  218. char mstring[];
  219. {
  220.     strcpy(Jhmsg->String,mstring);
  221.     Jhmsg->Command = JH_SG;
  222.     PutToPort((struct Message *)Jhmsg);
  223.     (void)WaitPort(replymp);
  224.     (void)GetMsg(replymp);
  225. }
  226.  
  227. void getuserdata(int which,int *odata)
  228. {
  229.    long Dtimelimit,TimeUsed;
  230.    switch(which)
  231.    {
  232.      case 6: *odata=1; break;
  233.      case 7:
  234.         Jhmsg->Command=DT_TIMELIMIT; Jhmsg->Data=READIT;
  235.  PutToPort((struct Message *)Jhmsg);
  236.     (void)WaitPort(replymp);
  237.     (void)GetMsg(replymp);
  238.         Dtimelimit=atol(Jhmsg->String);
  239.      Jhmsg->Command=DT_TIMEUSED; Jhmsg->Data=READIT;
  240.  PutToPort((struct Message *)Jhmsg);
  241.     (void)WaitPort(replymp);
  242.     (void)GetMsg(replymp);
  243.         TimeUsed=atol(Jhmsg->String);
  244.  
  245.         *odata=(int)((Dtimelimit-TimeUsed)/60L); 
  246.         break;
  247.    }
  248. }
  249. void getuserstring(char *ostring,int nl)
  250. {
  251.         Jhmsg->Command = nl;
  252.         Jhmsg->Data=READIT;
  253.     PutToPort((struct Message *)Jhmsg);
  254.     (void)WaitPort(replymp);
  255.     (void)GetMsg(replymp);
  256.    strcpy(ostring,Jhmsg->String);
  257. }
  258. void getcmduserstring(char *ostring,int nl)
  259. {
  260.         strcpy(Jhmsg->String,ostring);
  261.         Jhmsg->Command = nl;
  262.         Jhmsg->Data=READIT;
  263.     PutToPort((struct Message *)Jhmsg);
  264.     (void)WaitPort(replymp);
  265.     (void)GetMsg(replymp);
  266.    strcpy(ostring,Jhmsg->String);
  267. }
  268. void putuserstring(char *ostring,int nl)
  269. {
  270.         Jhmsg->Command = nl;
  271.         Jhmsg->Data=WRITEIT;
  272.         strcpy(Jhmsg->String,ostring);
  273.     PutToPort((struct Message *)Jhmsg);
  274.     (void)WaitPort(replymp);
  275.     (void)GetMsg(replymp);
  276.  
  277. }
  278.  
  279. void Drop()
  280. {
  281. }
  282. void getmaxuserstring(char *ostring,int nl)
  283. {
  284.   return;
  285. }
  286. struct MsgPort *CreatePrt(UBYTE *name,LONG pri)
  287. {
  288.   int sigBit;
  289.   struct MsgPort *mp;
  290.   
  291.   if((sigBit=AllocSignal(-1L))==-1)
  292.     return(NULL);
  293.   mp=(struct MsgPort *)
  294.      AllocMem((ULONG)sizeof(struct MsgPort),(ULONG)MEMF_CLEAR|MEMF_PUBLIC);
  295.   if(!mp)
  296.   {
  297.     FreeSignal(sigBit);
  298.     return(NULL);
  299.   }
  300.   mp->mp_Node.ln_Name=name;
  301.   mp->mp_Node.ln_Pri=pri;
  302.   mp->mp_Node.ln_Type=NT_MSGPORT;
  303.   mp->mp_Flags=PA_SIGNAL;
  304.   mp->mp_SigBit=sigBit;
  305.   mp->mp_SigTask=(struct Task *)FindTask(0L);
  306.   if(name)
  307.     AddPort(mp);
  308.   else
  309.     NewList(&(mp->mp_MsgList));
  310.   return(mp);
  311. }
  312.  
  313.  
  314. void FlagFile(char *string)
  315. {
  316.    strcpy(Jhmsg->String,string);
  317.     Jhmsg->Command = JH_FLAGFILE;
  318.     PutToPort((struct Message *)Jhmsg);
  319.     (void)WaitPort(replymp);
  320.     (void)GetMsg(replymp);
  321. }
  322. VOID CloseOut()
  323. {
  324.   ShutDown();
  325.   end();
  326. }